set icon of bg btn "ToBar" of cd "AutoMusicon" to 20081
visual zoom open
go cd "AutoMusicon"
play stop
end Automusicon
on idle
send mouseup to cd btn 1
send mouseup to cd btn 4
pass idle
end idle
-- part 5 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=224 top=40 right=74 bottom=258
-- title width / last selected line: 0
-- icon id / first selected line: 29100 / 29100
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Top
----- HyperTalk script -----
on mouseUp
if visible of cd btn 1 is true then
hide cd btn 1
hide cd btn 2
else
show cd btn 1
show cd btn 2
end if
end mouseUp
-- part 6 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=225 top=71 right=105 bottom=259
-- title width / last selected line: 0
-- icon id / first selected line: 29200 / 29200
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Bottom
----- HyperTalk script -----
on mouseUp
Automusicon
end mouseUp
-- part 1 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=76 top=183 right=312 bottom=476
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name:
-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=220 top=42 right=90 bottom=261
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: To Automusicon
----- HyperTalk script -----
on mouseUp
Automusicon
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=76 top=38 right=86 bottom=140
-- title width / last selected line: 0
-- icon id / first selected line: 27513 / 27513
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global ShotTimer
add 1 to ShotTimer
if ShotTimer = 3 then
show cd btn 4
end if
if ShotTimer = 12 then
hide cd btn 4
put empty into ShotTimer
end if
end mouseUp
-- part 11 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=81 top=37 right=167 bottom=163
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
if the screenRect is "0,0,512,342" then
answer "Human, do you want to play a game?" &return &"(on a Mac Plus or Mac SE)" with "SE/30" or "Help!" or "Yes"
if it is "Yes" then open "Pinball Arcade"
if it is "SE/30" then popup "SE/30"
if it is "Help!" then popup "Help!"
end if
if the screenRect is not "0,0,512,342" then
answer "Unfortunately the pinball games do not work correctly with a LARGE screen." with "Risk It" or "Help!" or "OK"
if it is "Risk It" then open "Pinball Arcade"
if it is "OK" then answer "There's always the Juke Box."
if it is "Help!" then popup "Help!"
end if
end mouseUp
-- part 12 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=75 top=179 right=309 bottom=479
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name: SE/30
----- HyperTalk script -----
on mouseUp
popup "SE/30"
end mouseUp
-- part 13 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=57 top=175 right=321 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name: Help!
----- HyperTalk script -----
on mouseUp
popup "Help!"
end mouseUp
-- part contents for card part 1
----- text -----
Yea, there's one of these in every town, whether it's called Alphie's or Al's—the same slime ordering a drink, the same brooding loner, the same jukebox in the corner, the same creep banging away at the pinball machine, and always some empty-headed fool telling you his life story. The history of a man, the history of a people—it's either filled with a passionate sense of purpose, or it's a boring tale of failure and misery or vain and empty success.
-- part contents for card part 12
----- text -----
Your SE/30 is too fast for the standard set of pinball games.On disk 3 of IF MONKS HAVE MACS... there is a slowed down set of these same pinball games that will run at a normal speed on your fast machine. The slowed down games are in a stuffit file called “Slowed Down Pinball.sit”. They come with instructions that explain how to install them. Read the instructions! When you have installed them click “Yes” or hit the return when asked, “Human, do you want to play a game?”
-- part contents for card part 13
----- text -----
Pinball Construction Set, one of truly great computer games, is in the electronic equivalent of “out of print”. These classic Pinball Construction Set templates bomb on a Mac II, and will not run on a large screen (unless you reduce it with Stepping Out™) On a Plus or an SE they do not run smoothly (the ball jerks around) under multi-finder 6.02, but they run fine if multi-finder is turned off. I have no way of knowing what they will do under System 7.0. If you can't get them to run, at least you can see what they look like by opening their MacPaint documents them with any paint program.